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CHECK ACCESS RIGHTS FOR CONTROL WRITE FUNCTIONS 
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SYS.SRCIMTFDT.MAR; 1 


MTFDT = MAGTAPE FUNCTION DECISION TABLE ROUTINES 
IDENT *v04-000' 


COPYRIGHT (c) 1978, 1980, 1982, 1984 BY 
DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. 
ALL RIGHTS RESERVED. 


THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND corres 

IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE 
SION OF THE ABOVE Sg ld oll NOTICE. THIS SOFTWARE OR ANY OTHER 
S THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY 
Sa nerchntee’ NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY 


THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE 
OORPORAT On NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT 


DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS 
SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. 
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D. N. CUTLER 29-JUN-77 
MAGTAPE FUNCTION DECISION TABLE ROUTINES 
MODIFIED BY: 


v03-001 LMP0185 L. Mark Pilan 31-Jan-1984 10:49 
Track interface change to EXESCHKxxxACESS routines. 

v0003 RLROOO1 Robert Rappepers 11-March-1980 
Added grrer return code when volume software write a ked. 

v0002 ACG004 Andrew C. Goldstein, 8-Aug-1979 :05 


Protection check interface changes 


MACRO LIBRARY CALLS 
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= MAGTAPE FUNCTION DECISION TABLE ROUTIN 16-SEP-1 :36:4 AX/VMS Macro v04-0 Pp 
CHECK ACCESS RIGHTS FOR CONTROL WRITE FU mets 7 89:28:58 EOYs. SRCIMTFDT.MAR; 4 pa d) 
1 -SBTTL CHECK ACCESS RIGHTS FOR CONTROL WRITE FUNCTIONS 
g | : MTSCHECK_ACCESS = CHECK ACCESS RIGHTS FOR CONTROL WRITE FUNCTIONS 
5 ; THIS ROUTINE IS CALLED BY THE FUNCTION DECISION TABLE DISPATCHER WHEN A WRITE 
§ : TAPE MARK OR ERASE TAPE FUNCTION IS ENCOUNTERED. ITS FUNCTION IS TO CHECK THE 
; ACCESS RIGHTS OF THE REQUESTING PROCESS. 
0 § : INPUTS: 
60 ; 
61 ; RO = SCRATCH. 
8 66 ; Ri = SCRATCH. 
65 ; Ré = SCRATCH. 
900 64 ; R35 = ADDRESS OF I/0 REQUEST PACKET 
38 65 ; R4 = CURRENT PROCESS PCB ADDRESS. 
00 66 ; R5 = ASSIGNED DEVICE UCB ADDRESS. 
B808 67 ; Rg = ADDRESS OF CCB. 
000 68 ; R7 = 1/0 FUNCTION CODE BIT NU 
0000 $9 : R8 = FUNCTION DECISION TABLE DISPATCH ADDRESS. 
000 0; R9 = SCRATCH. 
000 713: R10 = SCRATCH. 
000 ie 3 R11 = SCRATCH. 
8000 t 3 AP = ADDRESS OF FIRST FUNCTION DEPENDENT PARAMETER. 
9000 f3 > OUTPUTS: 
itd 6 : THE ACCESS RIGHTS OF THE REQUESTING PROCESS ARE CHECKED TO DETERMINE 
44 78 ; WHETHER A CONTROL WRITE FUNCTION CAN BE PERFORMED. IF THE REQ UESTING 
000 79 ; PROCESS DOES NOT HAVE SUFFICIENT PRIVILEGE, THEN THE 1/0 FUNCTION IS 
0000 80 ; ABORTED WITH A STATUS OF SS$_NOPRIV. OTHERWISE A RETURN TO THE FUNCTION 
000 81; DECISION TABLE DISPATCHER IS”EXECUTED. 
000 RSS 
O08 4 MTSCHECK_ACCESS:: CHECK ACCESS RIGHTS FOR CONTROL WRITE 
50 025¢C 8F 3C 000 5 MOVZWL sss WRITLCK,R Set code 
07 38 A 19 4 0005 6 BBS EVSV_SwWL GEESE _DEVCHAR(R5S),10$ IF SET. Toor Tw ARE URITE "LOCKED 
FFF3" 30 OO0A 87 BSBW EKESCMRORTACCES sWRITE FOR WRITE ACCESS TO VOLUME 
000D He :R = DRESS 
00D 9 R5 = UeB ADDR ESS 
01 50 (3 500 30 BLBC RO,10$ IF LBC ACCESS DENIED 
FFEC’ 31 001) 3 10$: BRw EXESABORTIO ABORT 1/0 OPERATION (STATUS = SS$_NOPRIV) 
0014 94 -END 
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MTFOT = MAGTAPE FUNCTION DECISION TABLE ROUTIN 1 P-19 :3 AX/VMS Macro V04- P 
Symbol table v g-366 pad 138% 9: 78: $8 Ht age 3 


sys. SRCIM PDT. MAR; (1) 

DEVSV_SWL = 00000019 
EXESABORTIO eereeene . 1 
EXESCHKWRTACCES eerreeee a 
MTISCHECK_ACCESS 0 RG” 1 
S$S$_WRITCCK = f 
UCBSL_DEVCHAR = 

pee cer eeccasrescees e 

; Psect synopsis H 
PSECT name Allocation PSECT No. Attributes 
« 4S « 00000000 8.3 0 ¢ 0.) NOPIC USR CON ABS LCL NOSHR NOEXE NORD way NOVEC BYTE 
. BLANK . seed ( 20. 1¢ 1.) \NOPIC USR CON REL LCL NOSHR-~ EXE RD NOVEC BYTE 
SABSS 00000000 (¢ 2.) NOPIC USR CON ABS LCL NOSHR EXE RD URT NOVEC BYTE 

$ewecceceecececoescocecocn 
; Performance indicators ! 
Phase Page faults CPU Time Elapsed Time 
Initialization 31 00:00: “97 00:00: 19) - 48 
Command processing 110 0:00:00.51 00:00:04. t9 
Pass 1 286 98:88: 7.9 00:00: +63. 6 
Symbol table sort 0 Ba: 701.4 00:00:03.65 
s2 34 0: + 1.1 00:00:04.14 

Suabot table output 3 00:00: 8-83 00:00:00.04 
Psect synopsis output 1 00:00:00.02 00:00:00.02 
Cross-reference output 0 00:00:00.00 00:00: +00 -Y 
Assembler run totals 467 00:00:11.14 00:00:39.91 


The yorting set Limit was 1350 pages. 

44767 bytes (88 pages) of virtual memory were used to buffer the intermediate code. 

There were 60 pages of symbol table space allocated to hold 962 non-local and 1 local symbols. 
94 source Lines were read in Pass 1, producing ai object records in Pass 2 

11 pages of virtual memory were used to define 10 macros. 


emer one orm w een nee eer eer ean} 


Macro Library name Macros defined 
5 $S22SDUAgE: pSY3- -OBJJL1IB.MLB;1 g 
55$DUA SYSLIBJSTARLET.MLB;2 
TOTALS (all Libraries) 7 


1033 GETS were required to define 7 macros. 
There were no errors, warnings or information messages. 
MACRO/LIS=LIS$:MTFDT/OBJ=OBJS:MTFDT MSRCS$:MTFDT/UPDATE=(ENHS:MTFDT) +EXECMLS/LIB 
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